home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1986 July
/
Ahoy_Magazine_86-07_1986_Double_L.d64
/
token lister 2
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
352b
|
14 lines
100 rem
204 gosub900
300 fort=128to203:poke2051,t:poke2053,t:print"[147]next":list-203
900 print"[147]":poke53280,6:poke53281,0:poke646,3
1000 print" << cd31-8 >>"
1001 print"commodares problem #27-4:"
1002 print" token lister"
1003 print"solution by"
1004 print" mark breault"
1005 print"> > > c-64 only < < <"
1006 rem note: line 100 must be typed!
1007 print" press return for each token"
1008 ford=1to3500:next:return